home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 57.zip / BS1 part 57 / Pro-net personal v2.0 d1.adf / ins1 < prev    next >
Text File  |  1990-05-11  |  7KB  |  221 lines
  1.  
  2. . ins1
  3. .key DNAME
  4. . Install PRO-NET_P to hard disk
  5. . Usage: execute ins <HARD DISK NAME>
  6. IF NOT EXISTS <DNAME>
  7. ECHO "<DNAME> not found!"
  8. QUIT
  9. ENDIF
  10. DISKCOPY DF0: TO RAD: NAME MyRad
  11. FAILAT 31
  12. CD <DNAME>
  13. CD >NIL: /
  14. IF FAIL
  15. ECHO "<DNAME> is a Disk."
  16. SKIP TO_PRONET_P
  17. ;
  18. ; Send to <DNAME>PRO-NET_P routine
  19. ;
  20. ELSE
  21. ECHO "<DNAME> is a Volume."
  22. SKIP TO_ROOT
  23. ;
  24. ; Send to <DNAME> routine
  25. ;
  26. ENDIF
  27. LAB TO_PRONET_P
  28. IF exists <DNAME>PRO-NET_P
  29. ECHO "UPDATING PRO-NET_P"
  30. COPY  "RAD:#?"  <DNAME>PRO-NET_P
  31. COPY  "RAD:PNPDRAWER" TO <DNAME>PRO-NET_P.info
  32. DELETE <DNAME>PRO-NET_P/PNPDRAWER
  33. IF NOT exists <DNAME>PRO-NET_P/PNLIB
  34. SKIP MAKED
  35. endif
  36. ECHO "The Device and Symbol libraries already exist."
  37. ECHO "If you wish to install your library disk, enter these commands:"
  38. ECHO " "
  39. ECHO "EXECUTE PRO-NET_P:MERGE_LIBRARIES  source_drive  destination_drive"
  40. ECHO " "
  41. QUIT
  42. endif
  43. ECHO "INSTALLING PRO-NET_P"
  44. MAKEDIR  <DNAME>PRO-NET_P
  45. COPY  "RAD:#?"  <DNAME>PRO-NET_P
  46. COPY  "RAD:PNPDRAWER" TO <DNAME>PRO-NET_P.info
  47. DELETE <DNAME>PRO-NET_P/PNPDRAWER
  48. LAB MAKED
  49. ECHO "MAKING DIRECTORIES"
  50. MAKEDIR  <DNAME>PRO-NET_P/PNPOST
  51. MAKEDIR  <DNAME>PRO-NET_P/PNDIR
  52. MAKEDIR  <DNAME>PRO-NET_P/PNLIB
  53. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/TTL
  54. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/MOS
  55. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/VLSI
  56. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/ECL
  57. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/Analog
  58. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/Discrete
  59. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/MTTL
  60. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/User
  61. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/Symbol
  62. MAKEDIR  <DNAME>PRO-NET_P/PNLIB/schem
  63. COPY RAD:PNLIB/schem TO <DNAME>PRO-NET_P/PNLIB/schem
  64. LAB MERGE
  65. ECHO "COPYING LIBRARIES"
  66. ECHO " "
  67. ECHO "Please insert 1st. library disk in df0:"
  68. ASK "Hit 'Y' and 'RETURN' when ready"
  69. IF warn
  70. . The 2nd. lib disk may need be merged with the 1st. lib disk
  71. DISKCOPY DF0: TO RAD: NAME MyRad
  72. RAM:MERGELIB RAD:PNDIR/TTL  <DNAME>PRO-NET_P/PNDIR/TTL
  73. RAM:MERGELIB RAD:PNDIR/MTTL  <DNAME>PRO-NET_P/PNDIR/MTTL
  74. RAM:MERGELIB RAD:PNDIR/VLSI  <DNAME>PRO-NET_P/PNDIR/VLSI
  75. RAM:MERGELIB RAD:PNDIR/ECL  <DNAME>PRO-NET_P/PNDIR/ECL
  76. RAM:MERGELIB RAD:PNDIR/Analog  <DNAME>PRO-NET_P/PNDIR/Analog
  77. RAM:MERGELIB RAD:PNDIR/Discrete  <DNAME>PRO-NET_P/PNDIR/Discrete
  78. RAM:MERGELIB RAD:PNDIR/user  <DNAME>PRO-NET_P/PNDIR/User
  79. RAM:MERGELIB RAD:PNDIR/schem  <DNAME>PRO-NET_P/PNDIR/schem
  80. RAM:MERGELIB RAD:PNDIR/Symbol  <DNAME>PRO-NET_P/PNDIR/Symbol
  81. RAM:MERGELIB RAD:PNDIR/MOS  <DNAME>PRO-NET_P/PNDIR/MOS
  82. endif
  83. ECHO " "
  84. ECHO "Please insert 2nd. library disk in df0:"
  85. ASK "Hit 'Y' and 'RETURN' when ready"
  86. IF warn
  87. DISKCOPY DF0: TO RAD: NAME MyRad
  88. RAM:MERGELIB RAD:PNDIR/TTL  <DNAME>PRO-NET_P/PNDIR/TTL
  89. RAM:MERGELIB RAD:PNDIR/MTTL  <DNAME>PRO-NET_P/PNDIR/MTTL
  90. RAM:MERGELIB RAD:PNDIR/VLSI  <DNAME>PRO-NET_P/PNDIR/VLSI
  91. RAM:MERGELIB RAD:PNDIR/ECL  <DNAME>PRO-NET_P/PNDIR/ECL
  92. RAM:MERGELIB RAD:PNDIR/Analog  <DNAME>PRO-NET_P/PNDIR/Analog
  93. RAM:MERGELIB RAD:PNDIR/Discrete  <DNAME>PRO-NET_P/PNDIR/Discrete
  94. RAM:MERGELIB RAD:PNDIR/user  <DNAME>PRO-NET_P/PNDIR/User
  95. RAM:MERGELIB RAD:PNDIR/schem  <DNAME>PRO-NET_P/PNDIR/schem
  96. RAM:MERGELIB RAD:PNDIR/Symbol  <DNAME>PRO-NET_P/PNDIR/Symbol
  97. RAM:MERGELIB RAD:PNDIR/MOS  <DNAME>PRO-NET_P/PNDIR/MOS
  98. endif
  99. ECHO " "
  100. ECHO "Please insert 3rd. library disk in df0:"
  101. ASK "Hit 'Y' and 'RETURN' when ready"
  102. IF warn
  103. DISKCOPY DF0: TO RAD: NAME MyRad
  104. RAM:MERGELIB RAD:PNDIR/TTL  <DNAME>PRO-NET_P/PNDIR/TTL
  105. RAM:MERGELIB RAD:PNDIR/MTTL  <DNAME>PRO-NET_P/PNDIR/MTTL
  106. RAM:MERGELIB RAD:PNDIR/VLSI  <DNAME>PRO-NET_P/PNDIR/VLSI
  107. RAM:MERGELIB RAD:PNDIR/ECL  <DNAME>PRO-NET_P/PNDIR/ECL
  108. RAM:MERGELIB RAD:PNDIR/Analog  <DNAME>PRO-NET_P/PNDIR/Analog
  109. RAM:MERGELIB RAD:PNDIR/Discrete  <DNAME>PRO-NET_P/PNDIR/Discrete
  110. RAM:MERGELIB RAD:PNDIR/user  <DNAME>PRO-NET_P/PNDIR/User
  111. RAM:MERGELIB RAD:PNDIR/schem  <DNAME>PRO-NET_P/PNDIR/schem
  112. RAM:MERGELIB RAD:PNDIR/Symbol  <DNAME>PRO-NET_P/PNDIR/Symbol
  113. RAM:MERGELIB RAD:PNDIR/MOS  <DNAME>PRO-NET_P/PNDIR/MOS
  114. endif
  115. ECHO  " "
  116. echo "If you don't have any more Library disk(s) to be installed/merged,"
  117. echo "please remove RAD by typing REMRAD, then Reboot the system."
  118. echo " "
  119. ECHO "If you have more library disks to install, Please enter this command:"
  120. ECHO " "
  121. ECHO "EXECUTE PRO-NET_P:MERGE_LIBRARIES  source_drive  destination_drive"
  122. ECHO " "
  123. QUIT
  124.  
  125. LAB TO_ROOT
  126. IF exists <DNAME>PRO-NET_P
  127. ECHO "UPDATING PRO-NET_P"
  128. COPY  "RAD:#?"  <DNAME>
  129. DELETE <DNAME>PNPDRAWER
  130. IF NOT exists <DNAME>PNLIB
  131. SKIP MAKED1
  132. endif
  133. ECHO "The Device and Symbol libraries already exist."
  134. ECHO "If you wish to install your library disk, enter these commands:"
  135. ECHO " "
  136. ECHO "EXECUTE PRO-NET_P:MERGE_LIBRARIES  source_drive  destination_drive"
  137. ECHO " "
  138. QUIT
  139. endif
  140. ECHO "INSTALLING PRO-NET_P"
  141. IF NOT EXISTS <DNAME>
  142. MAKEDIR  <DNAME>
  143. endif
  144. COPY  "RAD:#?"  <DNAME>
  145. DELETE <DNAME>PNPDRAWER
  146. LAB MAKED1
  147. ECHO "MAKING DIRECTORIES"
  148. MAKEDIR  <DNAME>PNPOST
  149. MAKEDIR  <DNAME>PNDIR
  150. MAKEDIR  <DNAME>PNLIB
  151. MAKEDIR  <DNAME>PNLIB/TTL
  152. MAKEDIR  <DNAME>PNLIB/MOS
  153. MAKEDIR  <DNAME>PNLIB/VLSI
  154. MAKEDIR  <DNAME>PNLIB/ECL
  155. MAKEDIR  <DNAME>PNLIB/Analog
  156. MAKEDIR  <DNAME>PNLIB/Discrete
  157. MAKEDIR  <DNAME>PNLIB/MTTL
  158. MAKEDIR  <DNAME>PNLIB/User
  159. MAKEDIR  <DNAME>PNLIB/Symbol
  160. MAKEDIR  <DNAME>PNLIB/schem
  161. LAB MERGE
  162. ECHO "COPYING LIBRARIES"
  163. ECHO " "
  164. ECHO "Please insert 1st. library disk in df0:"
  165. ASK "Hit 'Y' and 'RETURN' when ready"
  166. IF warn
  167. . The 2nd. lib disk may need be merged with the 1st. lib disk
  168. DISKCOPY DF0: TO RAD: NAME MyRad
  169. RAM:MERGELIB RAD:PNDIR/TTL  <DNAME>PNDIR/TTL
  170. RAM:MERGELIB RAD:PNDIR/MTTL  <DNAME>PNDIR/MTTL
  171. RAM:MERGELIB RAD:PNDIR/VLSI  <DNAME>PNDIR/VLSI
  172. RAM:MERGELIB RAD:PNDIR/ECL  <DNAME>PNDIR/ECL
  173. RAM:MERGELIB RAD:PNDIR/Analog  <DNAME>PNDIR/Analog
  174. RAM:MERGELIB RAD:PNDIR/Discrete  <DNAME>PNDIR/Discrete
  175. RAM:MERGELIB RAD:PNDIR/user  <DNAME>PNDIR/User
  176. RAM:MERGELIB RAD:PNDIR/schem  <DNAME>PNDIR/schem
  177. RAM:MERGELIB RAD:PNDIR/Symbol  <DNAME>PNDIR/Symbol
  178. RAM:MERGELIB RAD:PNDIR/MOS  <DNAME>PNDIR/MOS
  179. endif
  180. ECHO " "
  181. ECHO "Please insert 2nd. library disk in df0:"
  182. ASK "Hit 'Y' and 'RETURN' when ready"
  183. IF warn
  184. DISKCOPY DF0: TO RAD: NAME MyRad
  185. RAM:MERGELIB RAD:PNDIR/TTL  <DNAME>PNDIR/TTL
  186. RAM:MERGELIB RAD:PNDIR/MTTL  <DNAME>PNDIR/MTTL
  187. RAM:MERGELIB RAD:PNDIR/VLSI  <DNAME>PNDIR/VLSI
  188. RAM:MERGELIB RAD:PNDIR/ECL  <DNAME>PNDIR/ECL
  189. RAM:MERGELIB RAD:PNDIR/Analog  <DNAME>PNDIR/Analog
  190. RAM:MERGELIB RAD:PNDIR/Discrete  <DNAME>PNDIR/Discrete
  191. RAM:MERGELIB RAD:PNDIR/user  <DNAME>PNDIR/User
  192. RAM:MERGELIB RAD:PNDIR/schem  <DNAME>PNDIR/schem
  193. RAM:MERGELIB RAD:PNDIR/Symbol  <DNAME>PNDIR/Symbol
  194. RAM:MERGELIB RAD:PNDIR/MOS  <DNAME>PNDIR/MOS
  195. endif
  196. ECHO " "
  197. ECHO "Please insert 3rd. library disk in df0:"
  198. ASK "Hit 'Y' and 'RETURN' when ready"
  199. IF warn
  200. DISKCOPY DF0: TO RAD: NAME MyRad
  201. RAM:MERGELIB RAD:PNDIR/TTL  <DNAME>PNDIR/TTL
  202. RAM:MERGELIB RAD:PNDIR/MTTL  <DNAME>PNDIR/MTTL
  203. RAM:MERGELIB RAD:PNDIR/VLSI  <DNAME>PNDIR/VLSI
  204. RAM:MERGELIB RAD:PNDIR/ECL  <DNAME>PNDIR/ECL
  205. RAM:MERGELIB RAD:PNDIR/Analog  <DNAME>PNDIR/Analog
  206. RAM:MERGELIB RAD:PNDIR/Discrete  <DNAME>PNDIR/Discrete
  207. RAM:MERGELIB RAD:PNDIR/user  <DNAME>PNDIR/User
  208. RAM:MERGELIB RAD:PNDIR/schem  <DNAME>PNDIR/schem
  209. RAM:MERGELIB RAD:PNDIR/Symbol  <DNAME>PNDIR/Symbol
  210. RAM:MERGELIB RAD:PNDIR/MOS  <DNAME>PNDIR/MOS
  211. endif
  212. ECHO  " "
  213. echo "If you don't have any more Library disk(s) to be installed/merged,"
  214. echo "please remove RAD by typing REMRAD, then Reboot the system."
  215. echo " "
  216. ECHO "If you have more library disks to install, Please enter this command:"
  217. ECHO " "
  218. ECHO "EXECUTE PRO-NET_P:MERGE_LIBRARIES  source_drive  destination_drive"
  219. ECHO " "
  220. QUIT
  221.